0 B=1504:C=20:TI$="000000":POKE650,0:X=0:Y=15:FT=198
1 DATA60,52,223,215,219,231,105,105,2,8,56,231,223,247,215,60,105,85,255,215,235
2 DATA235,20,60:FORI=0TO23:READA:POKE8704+I,A:NEXT:POKE56334,PEEK(56334)AND254
3 POKE1,PEEK(1)AND251:FORT=0TO511:POKE8192+T,PEEK(53248+T):NEXT:POKE1,PEEK(1)OR4
4 POKE56334,PEEK(56334)OR1:POKE53272,24:K=53280:POKE646,14:POKEK,.:POKEK+1,.
5 POKEK+2,14:POKEK+3,7 :POKE53270,152:DATA0,0,16,0,12,0,0,0:FORI=0TO7:READA
6 POKE8448+I,A:NEXT
7 FORI=0TO48:PRINT:NEXT
8 A=RND(1)*40:POKE1984+A,65:IFRND(1)>.7THENPOKE1984+A,64:R$=CHR$(13)
9 J=PEEK(56320)
10 IF(JAND4)=0ANDC<39THENPOKEB+C,32:C=C+1
11 IF(JAND8)=0ANDC>0THENPOKEB+C,32:C=C-1
12 POKEB+C,32:PRINT
13 IFPEEK(B+C)=65THEN16
14 IFPEEK(B+C)=64THENGOSUB17
15 POKEB+C,66:GOTO8
16 GOSUB19:PRINT"[147]GAME OVER!"R$"TIME:"TI$;R$"SCORE:"S;R$"HIT A KEY!":GOSUB18:RUN
17 FORI=0TO16:POKEK,I:NEXT:S=S+10:RETURN
18 POKEFT,0:WAITFT,1:RETURN
19 FORI=0TO7:POKE8448+I,.:NEXT:RETURN:REM SPACE PIRATES FUER M&T VON VINCENT M.